8 :PRINTCHR$(147):POKE53265,80:
9 A=A+10:IFA=20THEN29
11 POKE53280,.:POKE53281,.:FORC=3TO10:FORF=6TO17:POKE646,F
16 PRINT"                        [146]             " :POKE53283,F
18 PRINT"             [160][160][160][160][160][160][160][160][160][160][160][146]             " :POKE53282,C
20 PRINT"             [160][160][197][160][206][160][196][160][197][160][160][146]             " :POKE53284,C/F
24 PRINT"                        [146]             " :POKE53283,F+C/2
25 PRINT"[146]                        [146]" :POKE53283,C:POKE53284,PEEK(53282)
27 POKE214,F:SYS59749::NEXT:NEXT:GOTO9
28 PRINT"                                  "
29 POKE56325,1:PRINT"LUKIAN";:POKE56325,55
30 FORT=1TO300:NEXT:SYS2048